/* Copyright (c) 2006, Jan Flora <janflora@diku.dk>
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without modification,
 * are permitted provided that the following conditions are met:
 *
 *  - Redistributions of source code must retain the above copyright notice, this
 *    list of conditions and the following disclaimer.
 *  - Redistributions in binary form must reproduce the above copyright notice,
 *    this list of conditions and the following disclaimer in the documentation
 *    and/or other materials provided with the distribution.
 *  - Neither the name of the University of Copenhagen nor the names of its
 *    contributors may be used to endorse or promote products derived from this
 *    software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY
 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
 * SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

/*
  @author Jan Flora <janflora@diku.dk>
*/

module McpsDataIndicationM
{
	provides
	{
		interface McpsDataIndication;
	}
	uses
	{
		interface MemoryManager as BufferMng;
	}
}
implementation
{
	command result_t McpsDataIndication.destroy(Mcps_DataIndication primitive)
	{
		// Using msgType to indicate, if the primitive is used in an sdu.
		if ((primitive->msg.msgType)) {
			return call BufferMng.release(sizeof(mcpsToNwkMessage_t), (uint8_t*)primitive);
		} else {
			return SUCCESS;
		}
	}

	command void McpsDataIndication.getSrcAddress( Mcps_DataIndication indication, Ieee_Address addr )
	{
		mcpsDataInd_t* msg = &((McpsIndication_t*)indication)->msg.msgData.dataInd;
		addr->mode = msg->srcAddrMode;
		NTOUHCPY16(msg->srcPanId, (uint8_t*)&(addr->panId));
		if (addr->mode == 2) {
			NTOUHCPY16(msg->srcAddr, addr->address);
		} else {
			NTOUHCPY64(msg->srcAddr, addr->address);
		}
	}
	
	command void McpsDataIndication.getDstAddress(  Mcps_DataIndication indication, Ieee_Address addr )
	{
		mcpsDataInd_t* msg = &((McpsIndication_t*)indication)->msg.msgData.dataInd;
		addr->mode = msg->dstAddrMode;
		NTOUHCPY16(msg->dstPanId, (uint8_t*)&(addr->panId));
		if (addr->mode == 2) {
			NTOUHCPY16(msg->dstAddr, addr->address);
		} else {
			NTOUHCPY64(msg->dstAddr, addr->address);
		}
	}
	
	command result_t McpsDataIndication.getMsdu( Mcps_DataIndication indication, Ieee_Msdu msdu )
	{
		mcpsDataInd_t* msg = &((McpsIndication_t*)indication)->msg.msgData.dataInd;
		
		// The indication primitive is destroyed together with the msdu structure.
		// We use the Freescale type field in their nwkMessage structure to indicate
		// this.
		indication->msg.msgType = FALSE;
		msdu->buffer = (uint8_t*)indication;
		msdu->bufferLen = sizeof(mcpsToNwkMessage_t);
		msdu->payload = msg->msdu;
		msdu->payloadLen = msg->msduLength;
		msdu->bufferDestroyable = TRUE;
		return SUCCESS;
	}
	
	command uint8_t McpsDataIndication.getMpduLinkQuality( Mcps_DataIndication indication )
	{
		mcpsDataInd_t* msg = &((McpsIndication_t*)indication)->msg.msgData.dataInd;
		return msg->mpduLinkQuality;
	}
	
	command bool McpsDataIndication.getSecurityUse( Mcps_DataIndication indication )
	{
		mcpsDataInd_t* msg = &((McpsIndication_t*)indication)->msg.msgData.dataInd;
		return msg->securityUse;
	}
	
	command uint8_t McpsDataIndication.getAclEntry( Mcps_DataIndication indication )
	{
		mcpsDataInd_t* msg = &((McpsIndication_t*)indication)->msg.msgData.dataInd;
		return msg->aclEntry;
	}
}
